Voorbeeld van de functie Hour

Dit voorbeeld maakt gebruik van de functie Hour om het uur voor een opgegeven tijd te verkrijgen. In de ontwikkelomgeving wordt de tijd (letterlijke tijdwaarde) met behulp van de lokale instellingen van uw programmacode in korte datumnotatie weergegeven.

Dim MyTime, MyHour
MyTime = #4:35:17 PM#    ' Een tijd toewijzen.
MyHour = Hour(MyTime)    ' MyHour bevat 16.